home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / N-O / Notes.cpt / Notes on Notes / card_4587.txt < prev    next >
Text File  |  1988-04-15  |  8KB  |  365 lines
  1. -- card: 4587 from stack: in
  2. -- bmap block id: 4626
  3. -- flags: 0000
  4. -- background id: 2729
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 80
  10. -- high flags: 2004
  11. -- rect: left=342 top=70 right=185 bottom=472
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 20
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: movingNote
  20. ----- HyperTalk script -----
  21. on openfield
  22.   if the optionKey is down then
  23.     set the lockscreen to true
  24.     choose field tool
  25.     get loc of target
  26.     click at it
  27.     domenu "Clear Field"
  28.     choose browse tool
  29.     set the lockscreen to false
  30.   end if
  31.  
  32.   wait 10 ticks
  33.   if the mouse is down then
  34.     repeat until the mouse is up
  35.       set the loc of the target to the mouseLoc
  36.     end repeat
  37.   end if
  38. end openfield
  39.  
  40.  
  41. -- part 2 (button)
  42. -- low flags: 00
  43. -- high flags: 8004
  44. -- rect: left=262 top=19 right=38 bottom=319
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 0 / 0
  47. -- text alignment: 1
  48. -- font id: 20
  49. -- text size: 10
  50. -- style flags: 0
  51. -- line height: 13
  52. -- part name: New Note
  53. ----- HyperTalk script -----
  54. on mouseUp
  55.   set lockscreen to true
  56.   show card field movingnote
  57.   choose field tool
  58.   get the location of card field "movingNote"
  59.   click at it
  60.   doMenu "copy field"
  61.   domenu "Paste Field"
  62.   hide card field movingnote
  63.   choose browse tool
  64.   set lockscreen to false
  65. end mouseUp
  66.  
  67.  
  68.  
  69. -- part 3 (field)
  70. -- low flags: 00
  71. -- high flags: 2004
  72. -- rect: left=349 top=50 right=165 bottom=479
  73. -- title width / last selected line: 0
  74. -- icon id / first selected line: 0 / 0
  75. -- text alignment: 0
  76. -- font id: 20
  77. -- text size: 12
  78. -- style flags: 0
  79. -- line height: 16
  80. -- part name: movingNote
  81. ----- HyperTalk script -----
  82. on openfield
  83.   if the optionKey is down then
  84.     set the lockscreen to true
  85.     choose field tool
  86.     get loc of target
  87.     click at it
  88.     domenu "Clear Field"
  89.     choose browse tool
  90.     set the lockscreen to false
  91.   end if
  92.  
  93.   wait 10 ticks
  94.   if the mouse is down then
  95.     repeat until the mouse is up
  96.       set the loc of the target to the mouseLoc
  97.     end repeat
  98.   end if
  99. end openfield
  100.  
  101.  
  102. -- part 4 (field)
  103. -- low flags: 00
  104. -- high flags: 2004
  105. -- rect: left=339 top=86 right=201 bottom=469
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 0 / 0
  108. -- text alignment: 0
  109. -- font id: 20
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: movingNote
  114. ----- HyperTalk script -----
  115. on openfield
  116.   if the optionKey is down then
  117.     set the lockscreen to true
  118.     choose field tool
  119.     get loc of target
  120.     click at it
  121.     domenu "Clear Field"
  122.     choose browse tool
  123.     set the lockscreen to false
  124.   end if
  125.  
  126.   wait 10 ticks
  127.   if the mouse is down then
  128.     repeat until the mouse is up
  129.       set the loc of the target to the mouseLoc
  130.     end repeat
  131.   end if
  132. end openfield
  133.  
  134.  
  135. -- part 5 (field)
  136. -- low flags: 00
  137. -- high flags: 2004
  138. -- rect: left=368 top=123 right=238 bottom=498
  139. -- title width / last selected line: 0
  140. -- icon id / first selected line: 0 / 0
  141. -- text alignment: 0
  142. -- font id: 20
  143. -- text size: 12
  144. -- style flags: 0
  145. -- line height: 16
  146. -- part name: movingNote
  147. ----- HyperTalk script -----
  148. on openfield
  149.   if the optionKey is down then
  150.     set the lockscreen to true
  151.     choose field tool
  152.     get loc of target
  153.     click at it
  154.     domenu "Clear Field"
  155.     choose browse tool
  156.     set the lockscreen to false
  157.   end if
  158.  
  159.   wait 10 ticks
  160.   if the mouse is down then
  161.     repeat until the mouse is up
  162.       set the loc of the target to the mouseLoc
  163.     end repeat
  164.   end if
  165. end openfield
  166.  
  167.  
  168. -- part 6 (field)
  169. -- low flags: 00
  170. -- high flags: 2004
  171. -- rect: left=308 top=179 right=294 bottom=438
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 0
  175. -- font id: 20
  176. -- text size: 12
  177. -- style flags: 0
  178. -- line height: 16
  179. -- part name: movingNote
  180. ----- HyperTalk script -----
  181. on openfield
  182.   if the optionKey is down then
  183.     set the lockscreen to true
  184.     choose field tool
  185.     get loc of target
  186.     click at it
  187.     domenu "Clear Field"
  188.     choose browse tool
  189.     set the lockscreen to false
  190.   end if
  191.  
  192.   wait 10 ticks
  193.   if the mouse is down then
  194.     repeat until the mouse is up
  195.       set the loc of the target to the mouseLoc
  196.     end repeat
  197.   end if
  198. end openfield
  199.  
  200.  
  201. -- part 7 (field)
  202. -- low flags: 00
  203. -- high flags: 2004
  204. -- rect: left=234 top=155 right=270 bottom=364
  205. -- title width / last selected line: 0
  206. -- icon id / first selected line: 0 / 0
  207. -- text alignment: 0
  208. -- font id: 20
  209. -- text size: 12
  210. -- style flags: 0
  211. -- line height: 16
  212. -- part name: movingNote
  213. ----- HyperTalk script -----
  214. on openfield
  215.   if the optionKey is down then
  216.     set the lockscreen to true
  217.     choose field tool
  218.     get loc of target
  219.     click at it
  220.     domenu "Clear Field"
  221.     choose browse tool
  222.     set the lockscreen to false
  223.   end if
  224.  
  225.   wait 10 ticks
  226.   if the mouse is down then
  227.     repeat until the mouse is up
  228.       set the loc of the target to the mouseLoc
  229.     end repeat
  230.   end if
  231. end openfield
  232.  
  233.  
  234. -- part 8 (field)
  235. -- low flags: 00
  236. -- high flags: 2004
  237. -- rect: left=227 top=64 right=179 bottom=357
  238. -- title width / last selected line: 0
  239. -- icon id / first selected line: 0 / 0
  240. -- text alignment: 0
  241. -- font id: 20
  242. -- text size: 12
  243. -- style flags: 0
  244. -- line height: 16
  245. -- part name: movingNote
  246. ----- HyperTalk script -----
  247. on openfield
  248.   if the optionKey is down then
  249.     set the lockscreen to true
  250.     choose field tool
  251.     get loc of target
  252.     click at it
  253.     domenu "Clear Field"
  254.     choose browse tool
  255.     set the lockscreen to false
  256.   end if
  257.  
  258.   wait 10 ticks
  259.   if the mouse is down then
  260.     repeat until the mouse is up
  261.       set the loc of the target to the mouseLoc
  262.     end repeat
  263.   end if
  264. end openfield
  265.  
  266.  
  267. -- part 9 (field)
  268. -- low flags: 00
  269. -- high flags: 2004
  270. -- rect: left=118 top=171 right=286 bottom=248
  271. -- title width / last selected line: 0
  272. -- icon id / first selected line: 0 / 0
  273. -- text alignment: 0
  274. -- font id: 20
  275. -- text size: 12
  276. -- style flags: 0
  277. -- line height: 16
  278. -- part name: movingNote
  279. ----- HyperTalk script -----
  280. on openfield
  281.   if the optionKey is down then
  282.     set the lockscreen to true
  283.     choose field tool
  284.     get loc of target
  285.     click at it
  286.     domenu "Clear Field"
  287.     choose browse tool
  288.     set the lockscreen to false
  289.   end if
  290.  
  291.   wait 10 ticks
  292.   if the mouse is down then
  293.     repeat until the mouse is up
  294.       set the loc of the target to the mouseLoc
  295.     end repeat
  296.   end if
  297. end openfield
  298.  
  299.  
  300. -- part contents for card part 1
  301. ----- text -----
  302. get a axle nut for Art's bike before the weekend.
  303.  
  304. -- part contents for card part 3
  305. ----- text -----
  306. get an axle nut for Art's bike before the weekend.
  307.  
  308.  
  309.  
  310.  
  311. -- part contents for background part 1
  312. ----- text -----
  313.  
  314.  
  315.  
  316.  
  317. OK.  OK.  Now I better
  318. put that number in
  319. my rolodex...
  320.  
  321.  
  322.  
  323.  
  324.  
  325.  
  326.  
  327.  
  328.  
  329.  
  330.  
  331. -- part contents for card part 4
  332. ----- text -----
  333. check out that glider airport out by Lake Pleasant
  334.  
  335.  
  336.  
  337. -- part contents for card part 5
  338. ----- text -----
  339. pickup keyboard
  340. on friday
  341. $25 for repair
  342. talk to Hilda about Hypercar upgrade
  343.  
  344.  
  345. -- part contents for card part 6
  346. ----- text -----
  347. Irrigation is coming at 11:30 Wednesday.  See if Nick can go out and run it.
  348.  
  349.  
  350. -- part contents for card part 7
  351. ----- text -----
  352.  
  353. get the damn radio fixed in the Volkswagon
  354.  
  355. -- part contents for card part 8
  356. ----- text -----
  357. 4/12/85
  358. so and so called.  wants to meet with you on friday for breakfast.  call back at 711-4322
  359.  
  360.  
  361.  
  362. -- part contents for card part 9
  363. ----- text -----
  364. get the title changed over on the ford.  Need signature notorized and lien released.  State won't notorize so go to the bank .
  365.